package com.zzyl.nursing.service.impl;

import cn.hutool.core.bean.BeanUtil;
import cn.hutool.core.collection.CollUtil;
import cn.hutool.core.date.LocalDateTimeUtil;
import cn.hutool.core.text.CharSequenceUtil;
import cn.hutool.core.util.NumberUtil;
import cn.hutool.core.util.ObjectUtil;
import cn.hutool.json.JSONUtil;
import com.baomidou.mybatisplus.core.toolkit.Wrappers;
import com.baomidou.mybatisplus.extension.service.impl.ServiceImpl;
import com.zzyl.common.constant.CacheConstants;
import com.zzyl.common.utils.StringUtils;
import com.zzyl.nursing.domain.AlertData;
import com.zzyl.nursing.domain.AlertRule;
import com.zzyl.nursing.domain.DeviceData;
import com.zzyl.nursing.dto.AlertDeviceDataDto;
import com.zzyl.nursing.mapper.AlertRuleMapper;
import com.zzyl.nursing.mapper.DeviceMapper;
import com.zzyl.nursing.service.AlertWebSocketService;
import com.zzyl.nursing.service.IAlertDataService;
import com.zzyl.nursing.service.IAlertRuleService;
import com.zzyl.system.mapper.SysUserRoleMapper;
import lombok.extern.slf4j.Slf4j;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.beans.factory.annotation.Value;
import org.springframework.data.redis.core.RedisTemplate;
import org.springframework.stereotype.Service;

import java.time.LocalDateTime;
import java.time.LocalTime;
import java.time.temporal.ChronoUnit;
import java.time.format.DateTimeFormatter;
import java.util.Set;
import java.util.ArrayList;
import java.util.Arrays;
import java.util.Collection;
import java.util.Comparator;
import java.util.List;
import java.util.concurrent.TimeUnit;
import java.util.stream.Collectors;

/**
 * 报警规则Service业务层处理
 * 
 * @author ruoyi
 * @date 2024-09-19
 */
@Service
@Slf4j
public class AlertRuleServiceImpl extends ServiceImpl<AlertRuleMapper,AlertRule> implements IAlertRuleService
{
    @Autowired
    private AlertRuleMapper alertRuleMapper;

    /**
     * 查询报警规则
     * 
     * @param id 报警规则主键
     * @return 报警规则
     */
    @Override
    public AlertRule selectAlertRuleById(Long id)
    {
        return getById(id);
    }

    /**
     * 查询报警规则列表
     * 
     * @param alertRule 报警规则
     * @return 报警规则
     */
    @Override
    public List<AlertRule> selectAlertRuleList(AlertRule alertRule)
    {
        return alertRuleMapper.selectAlertRuleList(alertRule);
    }

    /**
     * 新增报警规则
     * 
     * @param alertRule 报警规则
     * @return 结果
     */
    @Override
    public int insertAlertRule(AlertRule alertRule)
    {
        return save(alertRule)?1:0;
    }

    /**
     * 修改报警规则
     * 
     * @param alertRule 报警规则
     * @return 结果
     */
    @Override
    public int updateAlertRule(AlertRule alertRule)
    {
        return updateById(alertRule)?1:0;
    }

    /**
     * 批量删除报警规则
     * 
     * @param ids 需要删除的报警规则主键
     * @return 结果
     */
    @Override
    public int deleteAlertRuleByIds(Long[] ids)
    {
        return removeByIds(Arrays.asList(ids))?1:0;
    }

    /**
     * 删除报警规则信息
     * 
     * @param id 报警规则主键
     * @return 结果
     */
    @Override
    public int deleteAlertRuleById(Long id)
    {
        return removeById(id)?1:0;
    }

    @Autowired
    private RedisTemplate<String, String> redisTemplate;

    /**
     * 报警过滤
     */
    @Override
    public void alertFilter() {
        //查询所有规则，遍历规则
        long count = count(Wrappers.<AlertRule>lambdaQuery().eq(AlertRule::getStatus, 1));
        if (count <= 0) {
            return;
        }
        //查询所有上报的数据
        log.info("开始查询Redis中的设备数据...");
        
        // 检查Redis中设备数据的总数量
        Long totalDevices = redisTemplate.opsForHash().size(CacheConstants.IOT_DEVICE_LAST_DATA);
        log.info("Redis中设备数据总数量: {}", totalDevices);
        
        // 获取所有的key
        Set<Object> keys = redisTemplate.opsForHash().keys(CacheConstants.IOT_DEVICE_LAST_DATA);
        log.info("Redis中的设备ID列表: {}", keys);
        
        List<Object> values = redisTemplate.opsForHash().values(CacheConstants.IOT_DEVICE_LAST_DATA);
        log.info("从Redis获取到 {} 个设备的数据", values.size());
        
        if (CollUtil.isEmpty(values)) {
            log.warn("Redis中没有设备数据，CacheConstants.IOT_DEVICE_LAST_DATA = {}", CacheConstants.IOT_DEVICE_LAST_DATA);
            return;
        }
        
        // 临时清理机制：检查并清理不兼容的旧数据
        log.info("开始检查Redis数据兼容性...");
        boolean hasIncompatibleData = false;
        for (Object value : values) {
            String jsonStr = value.toString();
            try {
                // 尝试快速验证数据格式
                if (jsonStr.contains("\"params\":{}") || jsonStr.contains("\"createTime\":")) {
                    log.warn("检测到旧格式数据，包含不兼容字段");
                    hasIncompatibleData = true;
                    break;
                }
            } catch (Exception e) {
                log.warn("数据格式检查异常: {}", e.getMessage());
                hasIncompatibleData = true;
                break;
            }
        }
        
        if (hasIncompatibleData) {
            log.warn("检测到不兼容的旧数据，清理Redis缓存以等待新数据...");
            redisTemplate.delete(CacheConstants.IOT_DEVICE_LAST_DATA);
            log.info("Redis缓存已清理，等待新设备数据上报...");
            return;
        }
        //解析上报的数据
        List<DeviceData> deviceDatas = new ArrayList<>();
        values.forEach(v -> {
            try {
                String jsonStr = v.toString();
                log.info("正在解析设备数据JSON: {}", jsonStr.substring(0, Math.min(200, jsonStr.length())) + "...");
                
                if (StringUtils.isNotEmpty(jsonStr)) {
                    String trimmedJson = jsonStr.trim();
                    log.info("JSON字符串长度: {}, 首字符: '{}', 首字符ASCII: {}", 
                             trimmedJson.length(), 
                             trimmedJson.length() > 0 ? trimmedJson.charAt(0) : "空", 
                             trimmedJson.length() > 0 ? (int)trimmedJson.charAt(0) : -1);
                    
                    // 处理可能的字符串转义问题：去除额外的引号包装
                    if (trimmedJson.startsWith("\"") && trimmedJson.endsWith("\"") && trimmedJson.length() > 2) {
                        log.info("检测到字符串被额外包装，去除外层引号...");
                        trimmedJson = trimmedJson.substring(1, trimmedJson.length() - 1);
                        // 处理可能的转义字符
                        trimmedJson = trimmedJson.replace("\\\"", "\"");
                        log.info("去除包装后的JSON: {}", trimmedJson.substring(0, Math.min(200, trimmedJson.length())) + "...");
                    }
                    
                    // 使用AlertDeviceDataDto解析JSON，避免复杂字段问题
                    try {
                        log.info("使用AlertDeviceDataDto解析JSON数据...");
                        
                        // 确保JSON是数组格式
                        if (!trimmedJson.startsWith("[")) {
                            log.warn("JSON不是数组格式，尝试包装为数组: {}", trimmedJson.substring(0, Math.min(100, trimmedJson.length())));
                            if (trimmedJson.startsWith("{")) {
                                trimmedJson = "[" + trimmedJson + "]";
                                log.info("已包装为数组格式");
                            } else {
                                log.error("无法识别的JSON格式，跳过此数据: {}", trimmedJson.substring(0, Math.min(100, trimmedJson.length())));
                                return; // 跳过这个数据，不抛异常
                            }
                        }
                        
                        List<AlertDeviceDataDto> alertDataList = JSONUtil.toList(trimmedJson, AlertDeviceDataDto.class);
                        log.info("AlertDeviceDataDto解析成功，解析到 {} 条数据", alertDataList.size());
                        
                        // 将AlertDeviceDataDto转换为DeviceData
                        for (AlertDeviceDataDto alertData : alertDataList) {
                            DeviceData deviceData = new DeviceData();
                            deviceData.setIotId(alertData.getIotId());
                            deviceData.setDeviceName(alertData.getDeviceName());
                            deviceData.setProductKey(alertData.getProductKey());
                            deviceData.setProductName(alertData.getProductName());
                            deviceData.setFunctionId(alertData.getFunctionId());
                            deviceData.setAccessLocation(alertData.getAccessLocation());
                            deviceData.setLocationType(alertData.getLocationType());
                            deviceData.setPhysicalLocationType(alertData.getPhysicalLocationType());
                            deviceData.setDeviceDescription(alertData.getDeviceDescription());
                            deviceData.setDataValue(alertData.getDataValue());
                            // 将字符串时间转换为LocalDateTime
                            if (StringUtils.isNotEmpty(alertData.getAlarmTime())) {
                                try {
                                    deviceData.setAlarmTime(LocalDateTime.parse(alertData.getAlarmTime(), 
                                        DateTimeFormatter.ofPattern("yyyy-MM-dd HH:mm:ss")));
                                } catch (Exception e) {
                                    log.warn("时间格式转换失败: {}, 使用当前时间", alertData.getAlarmTime());
                                    deviceData.setAlarmTime(LocalDateTime.now());
                                }
                            } else {
                                deviceData.setAlarmTime(LocalDateTime.now());
                            }
                            deviceDatas.add(deviceData);
                        }
                        log.info("成功转换为 {} 条DeviceData", deviceDatas.size());
                        
                    } catch (Exception parseException) {
                        log.error("AlertDeviceDataDto解析失败: {}", parseException.getMessage());
                        parseException.printStackTrace();
                        
                        // 降级处理：尝试原有的解析方式
                        log.info("尝试使用原有方式解析...");
                        // 检查是否是数组格式
                        if (trimmedJson.startsWith("[")) {
                            // 是数组格式，直接解析
                            log.info("检测到数组格式，开始解析...");
                            List<DeviceData> parsedList = JSONUtil.toList(trimmedJson, DeviceData.class);
                            log.info("数组解析成功，解析到 {} 条数据", parsedList.size());
                            deviceDatas.addAll(parsedList);
                        } else if (trimmedJson.startsWith("{")) {
                            // 是单个对象格式，先转换成数组再解析
                            log.info("检测到对象格式，转换为数组后解析...");
                            List<DeviceData> singleList = JSONUtil.toList("[" + trimmedJson + "]", DeviceData.class);
                            log.info("对象解析成功，解析到 {} 条数据", singleList.size());
                            deviceDatas.addAll(singleList);
                        } else {
                            log.warn("无法识别的JSON格式，既不是数组也不是对象: {}", trimmedJson.substring(0, Math.min(100, trimmedJson.length())));
                            log.warn("完整JSON数据（前500字符）: {}", trimmedJson.substring(0, Math.min(500, trimmedJson.length())));
                            
                            // 强制尝试按数组格式解析
                            try {
                                log.info("尝试强制按数组格式解析...");
                                List<DeviceData> forceParsedList = JSONUtil.toList(trimmedJson, DeviceData.class);
                                log.info("强制数组解析成功，解析到 {} 条数据", forceParsedList.size());
                                deviceDatas.addAll(forceParsedList);
                            } catch (Exception forceParseException) {
                                log.error("强制数组解析也失败: {}", forceParseException.getMessage());
                                
                                // 尝试按对象格式解析
                                try {
                                    log.info("尝试强制按对象格式解析...");
                                    List<DeviceData> forceObjList = JSONUtil.toList("[" + trimmedJson + "]", DeviceData.class);
                                    log.info("强制对象解析成功，解析到 {} 条数据", forceObjList.size());
                                    deviceDatas.addAll(forceObjList);
                                } catch (Exception forceObjException) {
                                    log.error("所有解析尝试都失败: {}", forceObjException.getMessage());
                                }
                            }
                        }
                    }
                }
            } catch (Exception e) {
                log.error("解析设备数据失败: {}, 数据: {}", e.getMessage(), v.toString().substring(0, Math.min(500, v.toString().length())));
                e.printStackTrace();
            }
        });

        log.info("总共解析到 {} 条设备数据", deviceDatas.size());
        //获取报警规则，进行匹配
        deviceDatas.forEach(d -> alertFilter(d));
    }

    /**
     * 逐条过滤报警数据
     *
     * @param deviceData 设备数据
     */
    private void alertFilter(DeviceData deviceData) {
        log.info("开始处理设备数据: iotId={}, functionId={}, dataValue={}, alarmTime={}", 
                 deviceData.getIotId(), deviceData.getFunctionId(), deviceData.getDataValue(), deviceData.getAlarmTime());
        
        //判断当前上报的数据是否超过了1分钟
        LocalDateTime alarmTime = deviceData.getAlarmTime();
        long between = LocalDateTimeUtil.between(alarmTime, LocalDateTime.now(), ChronoUnit.SECONDS);
        if (between > 60) {
            log.info("设备数据超过1分钟，跳过处理: {} 秒前", between);
            return;
        }
        //查询所有的该产品规则和该物模型的规则
        List<AlertRule> allRules = list(Wrappers.<AlertRule>lambdaQuery()
                .eq(AlertRule::getProductKey, deviceData.getProductKey())
                .eq(AlertRule::getFunctionId, deviceData.getFunctionId())
                .eq(AlertRule::getIotId, "-1")
                .eq(AlertRule::getStatus, 1));

        List<AlertRule> iotIdRules = list(Wrappers.<AlertRule>lambdaQuery()
                .eq(AlertRule::getProductKey, deviceData.getProductKey())
                .eq(AlertRule::getFunctionId, deviceData.getFunctionId())
                .eq(AlertRule::getIotId, deviceData.getIotId())
                .eq(AlertRule::getStatus, 1));
        //合并
        Collection<AlertRule> allArertRules = CollUtil.addAll(allRules, iotIdRules);
        log.info("找到 {} 条通用规则，{} 条设备专用规则，总共 {} 条规则", 
                 allRules.size(), iotIdRules.size(), allArertRules.size());
        
        //如何为空，则中断
        if (CollUtil.isEmpty(allArertRules)) {
            log.info("没有找到匹配的报警规则，跳过处理");
            return;
        }
        //按照过滤规则和上报的数据进行匹配
        allArertRules.forEach(alertRule -> deviceDataAlarmHandler(alertRule, deviceData));

    }



    /**
     * 过滤数据是否触发报警规则
     *
     * @param rule
     * @param deviceData
     */
    private void deviceDataAlarmHandler(AlertRule rule, DeviceData deviceData) {
        log.info("检查报警规则: ruleId={}, functionName={}, operator={}, value={}, duration={}", 
                 rule.getId(), rule.getFunctionName(), rule.getOperator(), rule.getValue(), rule.getDuration());
        
        //判断上报时间是否在规则的生效时段内 00:00:00~23:59:59
        String[] split = rule.getAlertEffectivePeriod().split("~");
        LocalTime startTime = LocalTime.parse(split[0]);
        LocalTime endTime = LocalTime.parse(split[1]);
        //获取上报时间
        LocalTime time = LocalDateTimeUtil.of(deviceData.getAlarmTime()).toLocalTime();
        //不在上报时间内，则结束请求
        if (time.isBefore(startTime) || time.isAfter(endTime)) {
            log.info("设备数据时间不在生效时段内: 当前时间={}, 生效时段={}~{}", time, startTime, endTime);
            return;
        }
        //获取IOTID
        String iotId = deviceData.getIotId();
        //统计次数的key
        String aggCountKey = CacheConstants.ALERT_TRIGGER_COUNT_PREFIX + iotId + ":" + deviceData.getFunctionId() + ":" + rule.getId();

        //数据对比，上报的数据与规则中的阈值进行对比
        //两个参数x,y(参数有顺序要求，左边是上报的数据，后边是规则的数据)  x==y 返回0  x>y 返回大于0  x<y 返回小于0的数值
        double deviceValue = Double.valueOf(deviceData.getDataValue());
        int compare = NumberUtil.compare(deviceValue, rule.getValue());
        log.info("数据对比: 设备值={}, 规则值={}, 操作符={}, 比较结果={}", 
                 deviceValue, rule.getValue(), rule.getOperator(), compare);
        
        if ((rule.getOperator().equals(">=") && compare >= 0) || (rule.getOperator().equals("<") && compare < 0)) {
            log.info("当前上报的数据符合规则异常");
        } else {
            //正常的数据
            log.info("数据正常，删除计数器: {}", aggCountKey);
            redisTemplate.delete(aggCountKey);
            return;
        }
        //异常的数据会走到这里
        //判断是否在沉默周期内
        String silentKey = CacheConstants.ALERT_SILENT_PREFIX + iotId + ":" + deviceData.getFunctionId() + ":" + rule.getId();
        String silentData = redisTemplate.opsForValue().get(silentKey);
        if (StringUtils.isNotEmpty(silentData)) {
            log.info("设备在沉默周期内，跳过报警: {}", silentKey);
            return;
        }
        //持续周期的逻辑
        String aggData = redisTemplate.opsForValue().get(aggCountKey);
        int count = StringUtils.isEmpty(aggData) ? 1 : Integer.parseInt(aggData) + 1;
        log.info("持续周期检查: 当前计数={}, 需要持续周期={}, 计数器key={}", count, rule.getDuration(), aggCountKey);
        
        //如果count与持续周期的值相等，则触发报警
        if (ObjectUtil.notEqual(count, rule.getDuration())) {
            //不相等
            log.info("持续周期未满足，更新计数器: {} -> {}", aggCountKey, count);
            redisTemplate.opsForValue().set(aggCountKey, count + "");
            return;
        }
        log.info("持续周期满足，触发报警！删除计数器: {}", aggCountKey);
        //删除redis的报警数据
        redisTemplate.delete(aggCountKey);
        //存储数据到沉默周期，设置一个过期时间，规则中的沉默周期
        redisTemplate.opsForValue().set(silentKey, "1", rule.getAlertSilentPeriod(), TimeUnit.MINUTES);
        log.info("设置沉默周期: {} 分钟", rule.getAlertSilentPeriod());

        //报警报警数据，需要找到对应的人
        List<Long> userIds = new ArrayList<>();
        if (rule.getAlertDataType().equals(0)) {
            //老人异常数据
            if (deviceData.getLocationType().equals(0)) {
                //说明是报警手表，直接可以找到老人的id,通过老人id,找到对应的护理员
                userIds = deviceMapper.selectNursingIdByIotIdWithElder(iotId);
            } else if (deviceData.getLocationType().equals(1) && deviceData.getPhysicalLocationType().equals(2)) {
                //说明是床位设备，可以通过床位id找到老人，通过老人id,找到对应的护理员
                userIds = deviceMapper.selectNursingIdByIotIdWithBed(iotId);
            }
        } else {
            //设备异常数据，找维修工，或者是行政人员
            userIds = userRoleMapper.selectByRoleName(deviceMaintainerRole);
        }
        //别管是哪种情况，都要通知超级管理员
        List<Long> managerIds = userRoleMapper.selectByRoleName(managerRole);
        Collection<Long> allUserIds = CollUtil.addAll(userIds, managerIds);
        //去重
        allUserIds = CollUtil.distinct(allUserIds);
        
        log.info("找到 {} 个相关用户，{} 个管理员，总共 {} 个用户需要通知", 
                 userIds.size(), managerIds.size(), allUserIds.size());

        //保存报警数据
        insertAlertData(allUserIds, rule, deviceData);

    }

    @Autowired
    private IAlertDataService alertDataService;

    @Autowired
    private AlertWebSocketService alertWebSocketService;

    /**
     * 保存报警数据
     *
     * @param allUserIds
     * @param rule
     * @param deviceData
     */
    private void insertAlertData(Collection<Long> allUserIds, AlertRule rule, DeviceData deviceData) {
        log.info("开始插入报警数据，用户数量: {}", allUserIds.size());
        
        if (CollUtil.isEmpty(allUserIds)) {
            log.warn("没有找到需要通知的用户，跳过插入报警数据");
            return;
        }
        
        //对象拷贝
        AlertData alertData = BeanUtil.toBean(deviceData, AlertData.class);
        alertData.setAlertRuleId(rule.getId());
        //心率<60,持续3个周期就报警
        String alertReason = CharSequenceUtil.format("{}{}{},持续{}个周期就报警", rule.getFunctionName(), rule.getOperator(), rule.getValue(), rule.getDuration());
        alertData.setAlertReason(alertReason);
        alertData.setStatus(0);
        alertData.setType(rule.getAlertDataType());
        
        log.info("报警原因: {}", alertReason);
        
        //遍历allUserIds
        List<AlertData> list = allUserIds.stream().map(userId -> {
            AlertData dbAlertData = BeanUtil.toBean(alertData, AlertData.class);
            dbAlertData.setUserId(userId);
            dbAlertData.setId(null);
            return dbAlertData;
        }).collect(Collectors.toList());

        //批量保存
        log.info("批量保存 {} 条报警数据到数据库", list.size());
        alertDataService.saveBatch(list);
        log.info("报警数据保存成功");

        // ============ 新增WebSocket推送逻辑 ============
        // 推送报警消息给相关用户
        try {
            List<String> userIdStrings = allUserIds.stream()
                    .map(String::valueOf)
                    .collect(Collectors.toList());
            
            // 使用第一条报警数据作为模板进行推送
            if (!list.isEmpty()) {
                AlertData firstAlert = list.get(0);
                alertWebSocketService.sendAlertToUsers(userIdStrings, firstAlert);
                log.info("成功通过WebSocket推送报警消息给 {} 个用户", userIdStrings.size());
            }
        } catch (Exception e) {
            log.error("WebSocket推送报警消息失败", e);
            // 不影响主流程，只记录错误日志
        }
        // ============ WebSocket推送逻辑结束 ============

    }

    @Autowired
    private DeviceMapper deviceMapper;

    @Autowired
    private SysUserRoleMapper userRoleMapper;

    @Value("${zzyl.nursing.deviceMaintainerRole:设备维修员}")
    private String deviceMaintainerRole;

    @Value("${zzyl.nursing.managerRole:超级管理员}")
    private String managerRole;

}
